home *** CD-ROM | disk | FTP | other *** search
/ Programmer Power Tools / Programmer Power Tools.iso / modula2 / mod2src.arc / WRITESM.MOD < prev   
Text File  |  1986-08-20  |  420b  |  20 lines

  1. MODULE WriteSm;
  2.  
  3. FROM InOut IMPORT WriteLn, WriteString;
  4.  
  5. BEGIN
  6.  
  7.    WriteString("This line will be displayed on the monitor.");
  8.    WriteLn;
  9.    WriteString('This line will be displayed too.');
  10.    WriteLn;
  11.    WriteString("This will all be ");
  12.    WriteString('on one line.');
  13.    WriteLn;
  14.    WriteString('She said, "I ');
  15.    WriteString("don't ");
  16.    WriteString('like dogs."');
  17.    WriteLn;
  18.  
  19. END WriteSm.
  20.